;The following is the election script for the polotics
;Copyright 2005 by Seraphino
;--------------------------------------------------------------------------

SCENE 35	PoliticsBuilding
	THEME 0
	MUSIC "Silence.mid"
	ACTOR	1,	"Polotical Advisor", Wizard, 9, 17, 100
	COMPARE #<num.peopleInScene>, 1
	IF= @signup
	IF> @toomany
	END

@signup
IF T24+T25+T26+T27, @waiting
1: Welcome, I am the polotical advisor, may I get your name?
ASK 99999
1: Ah, welcome %2
WAIT 2
1: Would you like to sign up for the elections?
ASK 300
IF -YES, @saidno
1: Good, please, right click me to access a menu, you must do everything on that menu to proceed.
END

@eventActorClick1
@signupmenu
MENU "Polotical Name=@pname", "Gold Desposit=@gdep", "Slogan=@slog", "Form of government=@fgov"
END

@pname
IF T24, @alreadyname
1: You will now select your polotical name, please, enter a name when asked...
WAIT 3
ASK 9999
WAIT 1
SET name, #<lastask>
1: So, your name is #<str.name>
WAIT 2
1: Very well, in a moment I will transfer you back to the menu, you have completed part 1
GIVE T24
WAIT 2
GOTO @signupmenu
END
@alreadyname
1: You have already selected your name
GOTO @signupmenu
END

@gdep
IF T25, @alreadydep
1: You may now deposit any amount for advertising and promotion amongst the people
MENU "Deposit nothing=@depnothing", "Deposit 1,000-Minor=@depminor", "Deposit 10,000-OK=@depok", "Deposit 100,000-Huge=@dephuge", "Depost 999,999-Gigantic=@depgiant"
END
@depnothing
1: Are you sure?
ASK 50
IF -YES, @saidno
GIVE T25
1: I will now transfer you back to the menu
GOTO @signupmenu
END

@depminor
1: Are you sure?
ASK 50
IF -YES, @saidno
1: Lets see if you have that much money
COMPARE #<num.hostGP>, 1000
IF< @cantafford
ADD totalmoney, 1000
TAKE G1000
SET gdeposit, 1000
GIVE T25
1: You have deposited 1000 Roman Golds
END

@depok
1: Are you sure?
ASK 50
IF -YES, @saidno
1: Lets see if you have that much money
COMPARE #<num.hostGP>, 10000
IF< @cantafford
ADD totalmoney, 10000
TAKE G10000
SET gdeposit, 10000
GIVE T25
1: You have deposited 10,000 Roman Golds
END

@dephuge
1: Are you sure?
ASK 50
IF -YES, @saidno
1: Lets see if you have that much money
COMPARE #<num.hostGP>, 100000
IF< @cantafford
ADD totalmoney, 100000
TAKE G100000
SET gdeposit, 100000
GIVE T25
1: You have deposited 100,000 Roman Golds
END

@depgiant
1: ARE YOU SURE?!?!?!?
ASK 50
IF -YES, @saidno
1: Lets see if you have that much money
COMPARE #<num.hostGP>, 999999
IF< @cantafford
ADD totalmoney, 999999
TAKE G999999
SET gdeposit, 1000
GIVE T25
1: You have deposited 999,999 Roman Golds
END
@alreadydep
1: You have already deposited your gold
GOTO @signupmenu
END
@cantafford
1: You do not have enough for this deposit
GOTO @gdep
END


@slog
IF T26, @alreadyslog
1: You now have the chance to enter in a slogan
ASK 9999
SET slogan, #<lastask>
GIVE T26
1: 1 more to go
END
@alreadyslog
1: You have already chosen your slogan
END

@fgov
1: What is your form of government?
MENU "Anarchy=@an", "Democracy=@demo", "Tyranny=@tyr", "Socailist=@soc"
END

@an
SET government, 1
GIVE T27
1: Your goverment has now been chosen
GOTO @signup
END

@demo
SET government, 2
GIVE T27
1: Your goverment has now been chosen
GOTO @signup
END

@tyr
SET government, 3
GIVE T27
1: Your goverment has now been chosen
GOTO @signup
END

@soc
SET government, 4
GIVE T27
1: Your goverment has now been chosen
GOTO @signup
END

@saidno
GOTO @signupmenu
END

@toomany
1: There are too many people in this scene to sign up, please, only have you here to sign up
END

@waiting
1: We are currently waiting for the debates, which will happen every day at 12:00 Noon
END